﻿Public Class numberadder
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub btnAdd_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnAdd.Click
        'Dim the Varaibles
        Dim theResult As Single

        'Place the sum of the two numbers into the result (after converting String to Single)
        theResult = CSng(tbNoOne.Text) + CSng(tbNoTwo.Text)

        'Display the Result in the label
        lblResult.Text = "The sum of the 2 numbers is " & theResult
    End Sub
End Class